home *** CD-ROM | disk | FTP | other *** search
/ Aminet 21 / Aminet 21 (1997)(GTI - Schatztruhe)[!][Oct 1997].iso / Aminet / util / misc / gpatch.lha / GPatch / ExampleScripts / UpdateMyProgram < prev    next >
Text File  |  1997-05-11  |  898b  |  30 lines

  1.  
  2. ;Patch the files on the distribution disk "MyProgram".
  3.  
  4. ;The quotes in the command lines are only necessary if the path/filename
  5. ;contains spaces.
  6.  
  7. echo "*N Please wait..."
  8. assign MyProgram: remove ; if you install the update on disk and the disk name
  9.                          ; and the assign are identical
  10. failat 9
  11.  
  12. gpatch "MyProgram:MyProgram" "MyProgram.patches" T:newfile
  13. copy T:newfile "MyProgram:MyProgram"
  14.  
  15. gpatch "MyProgram:MyProgram.readme" "MyProgram.patches" T:newfile
  16. copy T:newfile "MyProgram:MyProgram.readme"
  17.  
  18. ; If you are working on floppy disks, it may be better to copy the files to a
  19. ; faster location, because the lot of file seek and read actions on floppy
  20. ; disk are slow.
  21. ;copy "MyProgram:MyProgram" T:oldfile
  22. ;gpatch T:oldfile "MyProgram.patches" T:newfile
  23. ;copy T:newfile "MyProgram:MyProgram"
  24. ;delete >nil: T:oldfile
  25.  
  26. delete >nil: T:newfile
  27.  
  28. echo "*NPatch successful."
  29.  
  30.